; ORIGINAL: 3dt2.1/examples/printf.scm
; $Id: printf.scm,v 1.3 1996/10/21 15:59:28 aed Exp $
;-printf.scm ------------------------------------------------------
; Printf
;------------------------------------------------------------------
(define printf (lambda l (apply format (cons #t l)) (newline)))

